home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / Anwendun / Pov / POV302 / MANUAL / DOCSDEMO / LATHDEM4.POV < prev    next >
Encoding:
Text File  |  1997-01-20  |  1.1 KB  |  60 lines
  1. #include "colors.inc"
  2.  
  3. camera {  
  4.   orthographic
  5.   up <0, 5, 0>
  6.   right <5, 0, 0>
  7.   location <2.5, 2.5, -100>
  8.   look_at <2.5, 2.5, 0>
  9. }
  10.  
  11. /* set the control points to be used */
  12.  
  13. #declare Red_Point    = <1.00, 0.00, 0>
  14. #declare Orange_Point = <2.00, 1.00, 0>
  15. #declare Yellow_Point = <3.50, 2.00, 0>
  16. #declare Green_Point  = <2.00, 3.00, 0>
  17. #declare Blue_Point   = <1.50, 4.00, 0>
  18.                             
  19. /* make the control points visible */
  20.  
  21. cylinder { Red_Point, Red_Point - 20*z, .1 
  22.   pigment { Red }
  23.   finish { ambient 1 }
  24. }
  25.  
  26. cylinder { Orange_Point, Orange_Point - 20*z, .1
  27.   pigment { Orange }
  28.   finish { ambient 1 }
  29. }
  30.  
  31. cylinder { Yellow_Point, Yellow_Point - 20*z, .1
  32.   pigment { Yellow }
  33.   finish { ambient 1 }
  34. }
  35.  
  36. cylinder { Green_Point, Green_Point - 20*z, .1
  37.   pigment { Green }
  38.   finish { ambient 1 }
  39. }
  40.            
  41. cylinder { Blue_Point, Blue_Point- 20*z, .1
  42.   pigment { Blue }
  43.   finish { ambient 1 }
  44. }
  45.            
  46. /* something to make the curve show up */
  47.  
  48. lathe { 
  49.   quadratic_spline
  50.   5,
  51.   Red_Point,
  52.   Orange_Point,
  53.   Yellow_Point,
  54.   Green_Point,
  55.   Blue_Point
  56.   
  57.   pigment { White }
  58.   finish { ambient 1 }
  59. }
  60.